










i. OVERVIEW: 

THIS IS A DETAILED DESCRIPTION OF FDS 
SOFTWARE, INCLUDING A DESCRIPTION OF THE 
FUNCTION OF EACH PROGRAM. 

SEE THE INDIVIDUAL 43030XXXX DOCUMENTATION 
FOR FURTHER DETAILS OF THE PROGRAMS. 


NAME DESCRIPTION AND ERRORS 


PM FILE MANAGER PROGRAM FOR LISTING DISK DIRECTORIES, 

COPYING FILES, E'lC. 

l-UXT TEXT EDITOR FOR EDITING TEXT FILES 

ASM COP CROSS ASSEMBLER 

USK1T DISK INITIALIZATION AND TEST PROGRAM 

CUP MON COP MONITOR PROGRAM FOR LOADING AND ALTERING SHARED 

MEMORY, MAKING PROMS, SINGLE STEPPING, BREAKPOINTING, 
AND TRACING COP CHIPS, ETC. 

I 1ST LISTS FILES ON CONSOLE OR PRINTER 

XHEF GENERATES CROSS REFERENCE LISTING OF COP 
LABELS FROM SOURCE FILE. 

MASKTR GENERATES A DISK FOR TRANSFER OF CUSTOMER DEVELQFED 
PROGRAMS TO NSC FOR MASK GENERATION. 

MUX AG MEMORY DIAGNOSTIC FOR PDS SYSTEM. 

THERE ARE SIX (6) INCLUDE FILES WHICH ARE 
INCLUDED IN ALL PROGRAMS FOR THE PDS SYSTEM. 

THEY ARE: 

1 ) . INCLD LST 

2) . INCLD NACLIB 

3) . INCLD GENERAL 

4) . INCLD SYSRAM 

5) . INCLD HWADDR 

6) . INCLD ENTRY 

THE INCLUDES DEFINE ALL THE GENERALLY 
USED DEFINITIONS, ALL THE LIST DIRECTIVES, THE 
HARDWARE ADDRESSES, THE ENTRY POINTS OF ALL 
UTILITY PROGRAMS, THE RESERVED MEMORY LOCATIONS 
AND THE GENERALLY USED MACROS. 

ALL PDS PROGRAMS ARE SET UP IN THE FORMAT 
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SHOWN BELOW. THE MACROS DEFINED IN MACLIB AND ENTRY 
USE INFORMATION FROM THE FORMAT TO ASSIGN THE PROPER 
REV LEVEL, PROGRAM NAME, DESCR I PT I ON, CHANNGES SINCE 
LAST REVISION, AND ENTRY POINTS TO THE PROGRAMS. 

OTHER MACROS ASSIGN BASE PAGE VARIABLES 
START OF BASE PAGE, END OF BASE PAGE, BEGINNING 
OF PROGRAM, END OF PROGRAM, ASSIGNMENT OF SYSRAM 
LOCATIONS. 


. LIST OFFFF 
. . INCLD LST 
. INCLD MACLIB 

.NAME NEWNAME, SOFT, POXXXX, 'TODAYS DATE', A 

i (NONE) 

; EDIT LINE 4, AND DELETE THIS LINE 

; DESCRIPTION OF PROGRAM: 

; ADD YOUR OWN DESCRIPTION 

i 

. INCLD GENERAL 

.PAGE 'ADDITIONAL CONSTANT DEFINITIONS' 

; DEFINE YOUR OWN CONSTANTS 

i 

. INCLD SYSRAM 
. INCLD HWADDR 
. INCLD ENTRY 


ENTRY POINTS TO UTILITY ROUTINES 


START OF BASE PAGE 


BASE PAGE VARIABLES GO HERE 


END OF BASE PAGE 


START OF PROGRAM 


FIRST LINE OF PROGRAM, MUST BE ENTRY LINE. THE NAME IN LINE 
4 IS AUTOMATICALLY MADE A LABEL HERE, LOCATION 100 
THE REST OF YOUR PROGRAM GOES HERE 


END OF PROGRAM 


. END NEWNAME 

; EDIT THE . END LINE, USE YOUR PROGRAM NAME 
;>. CONVENTIONS AND STANDARDS: 
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Ml TO 
ran 

NZRO 
CP I NT 

si fl 

1NEN 

CRY 

OVFL 

LEZ 

SERB IT 

SELT 

NMDY 


BIT 0 OF ACO IS ONE 
BIT 1 OF ACO IS ONE 
ACO NOT EQUAL TO ZERO 
CONTROL PANEL INTERRUPT 
STACK FULL LIME EQUAL ONE 
INTERRUPT ENABLE EQUAL ONE 
CARRY EQUAL TO ONE 
OVERFLOW EQUAL TO ONE 
ACO LESS OR EQUAL TO ZERO 
CONSOLE INPUT FOR BAUDET 
SEL FLAG SET 
DISK DATA NOT READY 


CONTROL FLAGS 


I NTI-N 

SEL 


INTERRUPT ENABLE 
SELECT FLAG FOR SHIFTS 


STATUS FLAGS 


X '2000 
X '4000 
X '8000 


CARRY BIT 

OVERFLOW BIT 

LINK BIT FOR SHIFTS 


ASCII CHARACTER DEFINITIONS 


cr< 

LF 

CNTL A 

SHF TO 

MULL 

ESCAPE 

RUROUT 

I) 


X 'D 
X'A 
X'l 
X '3F 
X '0 
X 'IB 
X '7F 
X '20 


CARRIAGE RETURN 
LINE FEED 
CONTROL/A 

SHIFT/O (BACK ARROW ON TTY) 


BLANK OR SPACE 
FOR SOURCE FILES) 


PROMPT CHARACTERS USED BY EACH MAIN PROGRAM IN CDS 


7 ASM 


' Ay ' 

ASM 

Z CUP MON 

= 

'C>' 

COPMON 

ZDSKIT 

= 

'D> ' 

DSKIT 

‘/EDIT 


'E> ' 

EDIT 

ZFN 

= 

'F> ' 

FM 

/ PATCH 

S 

/ H> / 

PATCH 

‘/CDS ASM 

= 

'I>' 

CDS ASM 

/LINK 


'K> ' 

LINK 

/LIST 

= 

'L> ' 

LIST 

7 Ml) I AG 


'M> ' 

MEMORY 
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/PROMPT = 
ZXHL-.F 
2MASKTR = 
2 EXEC 


'P>' 
'R> ' 
'TO 
'X>' 


i PROMPT 
i XREF 

i MASK TRANSFER 
i EXEC 


AIL DISK FILE OPERATIONS MAKE USE OF A 'FILE STATUS 
TABLE' ( FST ) WHICH DEFINES THE VOLUME NAME, FILE NAME, FILE 
MODIFIER, ETC. OF A FILE. FOLLOWING IS A DEFINITION OF 
1HE CONTENTS OF THE FST: 


FSVi 

I-SV2 

ESV3 

FSV4 

PSN1 

FBN2 

f-SM3 

f-C;N4 

I* SMI 

FSM2 


'•SIT 


FSPL 


{•OCT 


i-SliA 


.‘SOI 


P’SVN 


VOLUME NAME, SUPPLIED BY 
ROUTINE 'PGFR ' 


FILE NAME, 
ROUTINE ' 


SUPPLIED BY 
PGFR ' 


FILE MODIFIER, SUPPLIED BY 
ROUTINE 'PGFR', DEFAULT 
SUPPLIED BY USER BEFORE 
CALLING PGFR 
INTERNAL TYPE (BITS 0-7) 
SUPPLIED BY USER. IF = 0, 
ROUTINE 'DISER' RETURNS 
ACTUAL INTERNAL TYPE IF 
FILE IS FOUND 
PROTECT LEVEL (BITS 12-15) 
SUPPLIED BY USER WHEN 
FILE IS CREATED. 

OTHERWISE IT IS MOT USED. 
CHANNEL TABLE ADDRESS 
SUPPLIED BY 'OPEN' 

ROUTINES 

BUFFER ADDRESS, SUPPLIED 
BY USER (256 WORDS) 

DISK I/O STATUS, RETURNED 
WHEN ERROR OCCURS, SEE 
DISK 10 STATUS RETURN CODES 
BELOW FOR DETAILS ON LEFT 
BYTE. SEE FIOSYS ERROR 
CODES BELOW FOR DETAILS 
ON RIGHT BYTE. 

FILE VERSION NUMBER, 
SUPPLIED BY 'DISER', 
INCREMENTED BY 'OPENW' OR 
'OPENM ' 


PILE STATUS TABLE SIZE 
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FSS1ZE 


15 


; WORDS/FILE STATUS TABLE 


I 

WHEN A FILE IS OPENED BY ANY OF THE ROUTINES 'OPENR ' , 
'UPENW ' OR 'OPENM ' , AN INTERNAL TABLE IS ASSIGNED TO THE 
FST. THIS INTERNAL TABLE, CALLED A 'CHANNEL TABLE' <CT), 

IS USED FOR ALL DISK READ AND WRITE OPERATIONS. A MAXIMUM 
OF 5 CHANNEL TABLES ARE ALLOWED AT ONE TIME. WHEN A FILE 
IS CLOSED BY THE 'CLOSE' ROUTINE, ITS CHANNEL TABLE ( 3 ) IS 
RELEASED, MAKING IT AVAILABLE FOR THE NEXT 'OPEN' 

OPERATION. FOLLOWING ANY DISK READ OR WRITE OPERATION, THE 
DISK I/O STATUS IS INDICATED IN BOTH THE FST AND THE 
CHANNEL TABLE. FOLLOWING IS A DEFINITION OF THE CONTENTS 
OF THE CT: 


CTCT 


0 

CHANNEL TABLE ADDRESS 

CTV1 

= 

l 

VOLUME NAME 

CTV2 

= 

2 


CT VS 

= 

3 


CTV4 

= 

4 


CTN1 

= 

5 

FILE NAME 

CTN2 

= 

6 


CTNS 

= 

7 


CTTvl4 


8 


CTNl 

= 

9 ; FILE MODIFIER 

CTNS 

= 

10 


CTFG 

= 

10 

FLAGS (BITS 0-7), SEE 




CHANNEL TABLE FLAGS BELOW 
(INDICATE OPEN FOR READ, 
WRITE, OR MODIFY) 

CTBS 

= 

11 

BEGINNING SECTOR 

CTLCi 

= 

12 

LAST SECTOR OPERATED ON 

Cl BP 

= 

13 

BUFFER POINTER 

crop 


14 

DISK I/O COMMAND 

CTNS 

=r 

15 

NEXT SECTOR 

CTBA 

= 

16 

BUFFER ADDRESS 

CTST 

= 

17 

DISK I/O STATUS 


CHANNEL TABLE SIZE 

CTSIZE = 18 ; WORDS/CHANNEL TABLE 


CHANNEL TABLE FLAGS 

READ STATUS FLAG 
WRITE STATUS FLAG 
MODIFY STATUS FLAG 


WU = 2 

MI) = 4 



MAXIMUM NUMBER OF CHANNEL TABLES 
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MAXCHN = 

5 





EACH DISKETTE HAS 

A TABLE. 

LOCATED IN SECTOR 0, CALLED THE 


'NEXT SECTOR 

TABLE 

OR 'NST'. 

THE FIRST 154 WORDS OF THIS 


TABLE ARE LINKS TO 

THE NEXT LOGICAL EXTENT OF THE DISKETTE. 


AM EXTENT IS 

A GROUP OF 4 

CONSECUTIVE SECTORS WHOSE SECTOR 


ADDRESS IS THE SAME EXCEPT 

FOR 

THE LAST TWO BITS. THERE ARE 


Jt>4 EXTENTS 

ON EACH DISKETTE. 

THESE EXTENTS ARE NOT USED IN 


CONSECUTIVE 

ORDER. 

BUT RATHER 

ARE ASSIGNED TO INDIVIDUAL 


PILES AS THEY ARE 

NEEDED. 

THE 

NST DEFINES THE ORDER THAT 


EXTENTS ARE 

TO BE 

ACCESSED 

IN 

WHEN ACCESSING A FILE. 


THE NST ALSO 

CONTAINS THE 

DIRECTORY ADDRESS AND DISKETTE 


VOLUME NAME 

AND HEADER STRING. 

FOLLOWING ARE DEFINITIONS 


OF THESE TERMS: 





NST DF 

154 



i 155TH WORD OF NST IS FIRST 






i DIRECTORY SECTCR NUMBER 


NST VOL = 

155 



i START OF DISK VOLUME NAME 


NST V 1 

0 



; VOLUME NAME OFFSETS 


N3TV2 

1 





NHTV3 

2 





NHTV'l 

3 





NSTIIDR = 

159 



; START OF DISK HEADER STRING 


DISK HEADER 

STRING 

LENGTH 


• 


1 IDNLEN = 

40 



; HEADER IS 40 CHARS MAXIMUM 


NST SIZE 






NSTSIZ = 

179 



; WORDS USED BY NST 


EACH DISKETTE HAS 

A DIRECTORY 

CONTAINING INFORMATION ABOUT 


HAD AND AVAILABLE 

SECTORS, 

AND FILE DATA FOR EACH FILE 


ON THE DISKETTE. FOLLOWING IS 

A DESCRIPTION OF THE 


DIRECTORY FORMAT: 





DRV I 

1 



i 2ND WORD OF DIRECTORY IS 


DRVF 

2 



i START OF DISK VOLUME NAME 


DRV3 

3 





DRV4 

4 





HSF 

6 



i FIRST BAD SECTOR 


BSL 

7 



i LAST BAD SECTOR 


HSC NT 

8 



; BAD SECTOR COUNT 


NAS 

16 



i NEXT AVAILABLE SECTOR 


LAS 

17 



i LAST AVAILABLE SECTOR 


ASCNT 

18 



; AVAILABLE SECTOR COUNT 
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DUE 



26 

# 

DIRECTORY STARTING SECTOR 

DUL 

ss 


27 

1 

DIRECTORY ENDING SECTOR 

DUG NT 

ss 


20 

i 

DIRECTORY SIZE (SECTORS) 

WIFE 

35 


30 

i 

FIRST FILE ENTRY IN 





$ 

DIRECTORY STARTS AT THE 





• 1 

31ST WORD AND HAS A FORMAT 





# 

AS SHOWN BELOW. 

EACH 

FILE HAS 

AN ENTRY IN 

THE DISKETTE DIRECTORY. THE 

ENTRY 

IS CREATED WHEN THE 

FILE 

IS 'CLOSED' FOR THE FIRST 

TIME. 

THE 

FORMAT OF EACH 

ENTRY 

IS AS FOLLOWS: 

DUN J 

ss 


0 

i 

FILE NAME 

DUNE 

= 


1 



DUNE 

= 


2 



DUN4 

= 


3 



DUMJ 

= 


4 

$ 

FILE MODIFIER 

DUNE 

= 


5 



DU IT 

= 


5 

i 

INTERNAL TYPE (BITS 0-7) 

DUDE 

= 


6 

i 

STARTING SECTOR NUMBER 

DUES 

s 


7 

i 

ENDING SECTOR NUMBER 

DUDE 

= 


8 

1 

DELETE FLAG CODE (BIT 15) 

DUEL 

St 


8 

f 

PROTECT LEVEL (BITS 11-14) 

PUTS 

- 


8 

i 

TOTAL # SECTORS USED (BITS 





i 

0-9) 

DUVN 

= 


9 

i 

FILE VERSION NUMBER 

p 

ft THE END OF 

THE DIRECTORY 

IS INDICATED BY A VALUE FOR DRN1 

GE X' 

FFFF. 

THE NEXT SECTOR TABLE MARKS THE END OF THE BAD 

SECTOR LIST, 

THE END OF THE FREE SECTOR LIST, AND THE END 

t)E EACH FILE 

WITH A SECTOR NUMBER OF X 'FFFF. 

I DIRECTORY 

ENTRY SIZE 



DEE* I Z 



10 

i 

WORDS/DIRECTORY ENTRY 

DEES 

55 


25 

i 

DIRECTORY ENTRIES PER SECTOR 

I SPECIAL DI 

SK 

FILE DEFINITIONS 


I i-S 

= 


X'lC 

i 

FILE SEPARATOR (EOF MARK) 

INTERNAL TYPE CODES FOR FILES 


I1UNIV 

— 


0 


UNIVERSAL 

II LM 

55 


1 


LOAD MODULE 

nut* 

55 


2 


MAIN PROGRAM 

nnv 

- - 


3 


OVERLAY 
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ITHL 

— 

4 


♦ 

BLOCK 

) TSYM 

SB 

5 


i 

SYMBOLIC 

1 1 SYT 

SB 

6 


i 

SYSTEM 

1 T DATA 

S5 

7 


i 

DATA 

FLOPPY DISK SPECIFICATIONS 



TRACKS 

= 

77 


i 

77 TRACKS/DISKETTE 

SECTORS 

=r 

8 


i 

8 SECTORS/TRACK 

F- XI ENT 

= 

4 


} 

4 SECTORS/EXTENT 

SECfSZ 

= 

256 


9 

256 WORDS/SECTOR 

SHIFT 

= 

2 


i 

EXTENT = 2**SHIFT 

SYNC 

= 

X 'A AAA 


# 

DISK SYNC WORD 

DSKADR 

= 

X '7D06 


i 

DISK HARDWARE ADDRESS 

PRESET 


X '7D02 


9 

ADDRESS FOR MASTER RESET 

DSKSTAT 

= 

0 


i 

STATUS OFFSET FROM DISK ADR 

DSHD AT A 


-1 


9 

DATA OFFSET FROM DISK ADR 

DISK 

I/O 

PARAMETER LIST 

DEFINIT 

IONS 

OPCODE 

— ■ 

0 


9 

READ/WRITE COMMAND (BELOW) 

PSECT 

= 

1 


« 

PHYSICAL SECTOR 

HUP ADR 

SB 

2 


i 

BUFFER ADDRESS 

ST AT US 

= 

3 


i 

DISK STATUS RETURN 

DISK 

I/O 

PARAMETER LIST 

SIZE 



PI. SIZE 

= 

4 


9 

WORDS/PARAMETER LIST 

DISK 

I/O 

COMMANDS 




VIC ODE 

= 

1 


9 

OPCODE FOR DISK WRITE 

RCOOE 

=s 

2 


9 

OPCODE FOR DISK READ 


MAXIMUM ALLOWED NUMBER OF BAD SECTORS WHEN INITIALIZING 
A DISKETTE 

HSMAX = 1 50 


I 

ff 



DISK INTERFACE STATUS SIGNAL DEFINITIONS 
DUROPN = X'8 ; DRIVE DOOR WAS OPENED 


Qj 
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ROUTINES 'DISKI ' AND 'DISK2' IN DISKIO RETURN A STATUS CODE 
WORD IN THE PARAMETER LIST ('STATUS'), WHICH DESCRIBES THE 
RLSULTS OF THE DISK I/O OPERATION. THIS STATUS WORD HAS THE 
FOLLOWING FORMAT: 

UPPER BYTE = TOTAL NUMBER OF ERRORS ENCOUNTERED 
LOWER BYTE = DISKIO STATUS RETURN CODE 


DISKIO STATUS RETURN CODE BIT DEFINITIONS: 


NOFRR 

DNRRY 

ADORER = 

NJSYNC = 

i/IRFRR 

RDLRR 

CMDL-R 


FIOSYS ERROR 

FRO J 

i-ROO 

Eft 03 

FR04 

FR05 

FRO A 

FRO? 

GROG) 

FR09 
FRJO 
FRU 
F R J 2 
FRJ3 
FR J 4 
FR i 5 
FR J 6 
F R 1 7 

FRJO 
HU 7 
fcRPO 
FRO J 
F.R02 
FR03 
EK24 
FROD 
FRO A 


1 

2 

4 

8 

16 

32 

64 


CODE DEFINITIONS 

X '01 
X '02 
X '03 
X '04 
X '05 
X '06 
X '07 
X '08 

X '09 
X'10 
X '11 
X ' 12 
X '13 
X '14 
X '15 
X '16 
X '17 

X ' 18 
X ' 19 
X '20 
X '21 
X '22 
X '23 
X '24 
X '25 
X '26 


i NO ERRORS 
; DRIVE NOT READY 
i ADDRESSING ERROR 
i MISSING SYNC/WRITE PROTECT 
; WRITE ERROR (NO CRC VERIFY) 
; READ ERROR (NO CRC VERIFY) 
i ILLEGAL DISK COMMAND 


; WRONG DISKETTE VOLUME 
; DISK FULL, DIRECTORY FULL 
i UNABLE READ NST 
; UNABLE TO ACCESS DIRECTORY 
; UNABLE TO WRITE DIRECTORY 
} DIR DOES NOT MATCH NST 
; DRIVE NOT ACTIVE 
i ATTEMPT TO READ PAST THE 
; END OF THE DIRECTORY 
} INVALID CHANNEL TABLE 
i FILE NOT OPEN FOR READ 
; DISK READ ERROR ON FILE 
; ATTEMPT TO READ PASS EOF 
i FILE ALREADY OPEN 
i FILE NOT FOUND 
i NO CHANNEL TABLE AVAILABLE 
i FILE NOT OPEN FOR WRITE 
i ATTEMPT TO READ/WRITE PAST 
i THE END OF THE DISK 
i DISK WRITE ERROR ON FILE 
i FILE NOT OPEN FOR MODIFY 
; NO PERMISSION TO DEL FILE 
i NO PERMISSION TO MOD FILE 
; UNABLE TO UPDATE NST 
; UNABLE TO FIND END OF DIR 
; SYNTAX ERROR IN FILE NAME 
i TOO MANY VOLUMES 
s ILLEGAL DEVICE 


fi 



4 


SSI 
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NUMf-RRS 


X '26 

i NUMBER OF ERROR CODES 


DEFAULT 

PARAMETERS FOR COP DEVELOPMENT SYSTEM: 


DEFAULT 

TAB STOPS 



DTAiil 


9 



PI AH2 

= 

17 



Dl AH3 

— 

33 



CARRIAGE 

WIDTHS 


• 

IH-IIDTH 

— 

72 

i INITIAL WIDTH 


NMWPTH 


10 

; MINIMUM WIDTH 


NXNPTH 

= 

80 

; MAXIMUM WIDTH 


SERIAL I/O PARAMETER AND CONTROL WORDS 


i’NGPE 


OFA 

i 150/9600 PARITY MODE WORD 


NPMODE 

= 

OEE 

i 150/9600 NO PARITY MODE 


P I MODE 

= 

OFE 

; 110 PARITY MODE WORD 


NPI MOD 

= 

OEE 

s 110 NO PARITY MODE WORD 


UCNND1 

= 

037 

; UART CMND WORD 


HS3H 

= 

RSBAUD/32 

; RS232 TYPE/32 


^ i vn? 

= 

TYBAUD/32 

; CUR LOOP TYPE/32 


CRDL30 

= 

200 

i 150/300 BAUD CR/LF DEFAULT 


LPDL30 

= 

40 

i DELAYS IN MILLISECONDS, 





; START UP ONLY 


INITIAL 

CONSOLE SET UP PARAMETERS 


DO NMD 

— 

9600 

; BAUD RATE 


DCNT YP 

= 

RS32 

} TYPE 


DCMMOD 

— 

NPMODE 

i MODE 


INITIAL 

PRINTER SETUP PARAMETERS 


DPRHD 


1200 

i BAUD 


PPRl YP 

= 

RS32 

i TYPE 


DPRMOD 

— 

NPMODE 

; MODE 


PERIPHERAL DEVICE MNEMONICS 



| MML-NPT 

= 

'PT' 

i PAPER TAPE 
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MNEMCN = 
MNP HP R = 


'CN ' 
'PR ' 


i CONSOLE 
i PRINTER 


PERIPHERAL DEVICE CODES 


PTDEV 
CNDEV 
Pin DEV = 


X '2 
X'4 

X '8000 


PAPER TAPE 

CONSOLE 

PRINTER 


DEFAULT COP CHIP NUMBER 


PCH) P 


X '420 


INITIAL VALUES FOR TARGET CARD FLAGS 


mCTAC 
DUCNTR 
m»FFLG 
DEL AGS 
DUFDEX 


TCTAC 

OCNTR 

BPFLG 

FLAGS 

BPDEX 


MAXIMUM NUMBER OF BREAKPOINTS ALLOWED IN COPMON 
NRKCON =10 


THE FOLLOWING INCLUDE FILE CONTAINS MOST OF 

'inr-: macros used by the pds programs. <. incld maclib> 


.PAGE 'MACRO DEFINITIONS' 

MACRO FOR GENERATING COMMENTS AND ASSIGNING PROGRAM NAME 

. MACRO . NAME, MNAME, MWAREi PARTNUM, MDATE# MREV 
. MICRO PGMNM, 1# S# *MNAME* 

. MICRO PGMREV. 1. 1. *MREV* 

.LIST XL 1ST i OD 

.TITLE MNAME# ' P ARTNUM'^MREV MDATE ' 


PROGRAM NAME: 


MNAME 


SOURCE LANGUAGE OF THIS PROGRAM: IMP MACRO-CROSS-ASSEMBLER 

RUNNING ON PACE. 

OBJECT LANGUAGE OF THIS PROGRAM: IMP16C/200A MACHINE CODE 
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i MNAME IS A 

MWARE'-WARE PROGRAM WHICH IS INTENDED FOR USE 

; WITH THE NATIONAL SEMICONDUCTOR 'COP DEVELOPMENT SYSTEM' 

; (CDS), WHICH CONTAINS AN IMP16C/200A MICROCOMPUTER BOARD. 

L i FOR ADDITIONAL 

INFORMATION ON THIS DEVELOPMENT SYSTEM. SEE 

; 'COP DEVELOPMENT SYSTEM USER'S MANUAL'. 

; REVISION LEVEL 

<A=NO REVISIONS, B=FIRST REVISION, ETC. >: MREV 

i DATE OF THIS REVISION: MDATE 

1 

i FOLLOWING IS A 

SUMMARY OF THE REVISIONS MADE IN EACH 

; REVISION LEVEL 

OF THIS PROGRAM FOLLOWING REVISION A: 

i 

. LIST 

XLIST 

. ENDM 


i MACRO FOR GENERATING PROGRAM PROMPT AND SIGNON LINE 

t 

. MACRO 

PRINT, STRING 

. MSTAT 

1 

. IFC 

'STRING' EQ 'SIGNON' 

MESSAGE 

1, "•PGMNM". REV: "PGMREV" , "PGMDAT" ' 

OUTPUT 

'NEW LINE' 

. ELSE 


. IFC 

'STRING' EQ 'PROMPT' 

OUTPUT 

'NEW LINE' 

JSR 

CNSTUP 

LD 

ACO, . +3 

JSR 

PUT2C _ 

JMP 

. +2 

. WORD 

Z '“‘"PGMNM" 

. ELSE 


. ERROR 

'PRINT ' 

. ENDIF 


. ENDIF 


. MSTAT 

0 

. ENDM 


; MACRO FOR SETTING START OF BASE PAGE AND PROGRAM 

$ 

. MACRO 

START, DUMMY, MBP 

. MSTAT 

1 

. LIST 

XLIST !OD 

. IFC 

'MBP' EQ 'BASE' 

. PAGE 

'BASE PAGE DEFINITIONS' 

. ASECT 


i 

. =010 

i BASE PAGE STARTS AT 010 

. ELSE 


. IFC 

'MBP' EQ 'PROGRAM' 

. PAGE 

'START OF PROGRAM' 

. LOCAL 
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. ASECT 


. =0100 


; PROGRAM STARTS AT 0100 


"PGMNM": 


. ELSE 
. ERROR 
. END IF 
. ENDIF 
. LIST 
. MSTAT 0 
. ENDN 


START' 


XLIST 


MACRO FOR SETTING END OF BASE PAGE AMD PROGRAM 


. MACRO 

END, DUMMY, MBP 

. IFC 

'MBP' EG 'BASE' 

EASECT=. 
. ELSE 

i SAVE 

. IFC 

'MBP' EG 'PROGRAM' 

. BSECT 

i SET 

, =. +EASECT 

. MSTAT 
. ELSE 

1 

. ERROR 
. ENDIF 
. ENDIF 
. ENDN 

'END ' 

D FOR OUTPUT CHARACTER ROUTINE 

. MACRO 

OUTPUT. STRING 

. IFC 

'STRING' EG 'NEW LINE 

J5R 
. ELSE 

CRLF 

. IFC 

'STRING' EG ' 

LI 

ACO, 6 

JSR 
. ELSE 

PUTB 

. IFC 

'STRING' EG ' 

LI 

ACO, 5 

JSR 
. ELSE 

PUTB 

. IFC 

'STRING' EG ' 

LI 

ACO, 4 

JSR 
. ELSE 

PUTB 

. IFC 

'STRING' EG ' 

LI 

ACO, 3 

JSR 
. ELSE 

PUTB 


A 
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.MICRO LONG. 9, 1. *-STRING#- 



•. IFC 

' "SHORT " ' EG " 


. ERROR 
. ELSE 

'STRING TOO SHORT' 


. IFC 

' "LONG" ' NE " 


. ERROR 

'STRING TOO LONG' 


. ELSE 
JMP 

OUTPUT 

MESS: 

. ASCII 

'STRING' 

OUTPUT: 

JSR 

FPOUT 


. WORD 
. ENDIF 
. ENDIF 

MESS 


. MDEL 

SHORT, LONG 


. MSTAT 
. ENDM 

0 


; MACRO FOR FRONT PANEL MESSAGE WITH DECIMAL POINT 

i 

. MACRO COPPNL. PSTR 
. MLOC MESS, OUTPUT 
JMP OUTPUT 

MESS: . PNLASC 'PSTR' 

OUTPUT: JSR MSGOUT 

. WORD MESS 
. ENDM 
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WAIT 


. ELGE 
. ERROR 
. END IF 
. END IF 
. ENDN 

MACROS FOR THE REFERENCED FIOSYS UTILITY ROUTINES 


. MACRO 

CLEAR 



JSR 

CLRHS 

i 

CLEAR HARDWARE STACK 

. ENDM 




. MACRO 

RESET 



JSR 

RESETD 

t 

RESET DISK STATUS 

. ENDM 




. MACRO 

REPORT 



LD 

AC2, =4t4 



JSR 

DERROR 

$ 

REPORT DISK ERRORS 

. ENDM 




. MACRO 

SEARCH 



JSR 

DISER 

i 

DIRECTORY FILE SEARCH 

JMP 

DSKERR 

i 

(?? DISK ERRORS ?? ) 

JMP 

DSKERR 

i 

(FILE NOT FOUND) 

. ENDM 




. MACRO 

OPEN 



LD 

AC 2, =4*2 



. IFC 

' #4 ' EQ 'READ ' 



JSR 

OPENR 

i 

OPEN FILE FOR READ 

. ELSE 




. IFC 

'#4' EQ 'WRITE' 



JSR 

OPENW 

/ 

OPEN FILE FOR WRITE 

. ELSE 




. IFC 

'#4' EQ 'MODIFY 

/ 


JSR 

OPENM 

i 

OPEN FILE FOR MODIFY 

. ELSE 




. ERROR 

'OPEN' 



. END IF 




. END IF 




. END IF 




JMP 

DSKERR 

9 

DISK ERRORS 

. ENDM 




. MACRO 

CLOSE 



LD 

AC2> =#2 



JSR 

CLOSE 

i 

CLOSE FILE 

JMP 

DSKERR 

9 

DISK ERRORS 

. ENDM 




. MACRO 

READ 










LD 

AC2, =#4 



. IFC 

'#1' EG 'SECTOR' 



JSR 

RCSECT 

j 

READ NEXT SECTOR OF FILE 

. ELSE 




. IFC 

'#1' EQ 'WORD' 



JSR 

RWORD 

i 

READ NEXT WORD FROM FILE 

. ELSE 




. ERROR 

'READ' 



. END IF 




. END IF 




JMP 

DSKERR 

i 

DISK ERRORS 

. IFC 

'#1' EQ 'WORD' 



. IFC 

'#5 ' EQ '8' 



AND 

ACO. = OFF 

i 

LM WORDS ARE 3 DITS ONLY 

. END IF 




. END IF 




. ENDM 




. MACRO 

WRITE 



LD 

AC2, =#4 



. IFC 

'#1' EQ 'SECTOR' 



JSR 

WCSECT 

i 

WRITE NEXT SECTOR FILE 

. ELSE 




. IFC 

'#1' EQ 'WORD' 



JSR 

WWORD 

i 

WRITE NEXT WORD TO FILE 

. ELSE 




. ERROR 

'WRITE ' 



. END IF 




. END IF 




JMP 

DSKERR 

i 

DISK ERRORS 

. ENDM 




. MACRO 

DELETE, AFST 



LD 

ACS, =*2 



JSR 

DELF 

i 

DELETE FILE 

JMP 

DSKERR 

i 

DISK ERRORS 

. ENDM 




. MACRO 

DIRECTORY 



. IFC 

'#1' EQ 'READ' 



. IFC 

'#2' EQ 'FIRST' 



JSR 

DIRF 

i 

READ FIRST DIRECTORY SECTOR 

. ELSE 




. IFC 

'#2' EQ 'NEXT' 



JSR 

DIRN 

i 

READ NEXT DIRECTORY SECTOR 

. ELSE 




. ERROR 

'DIRECTORY' 



. ENDIF 



1 

. ENDIF 




. ELSE 




. IFC 

'#1' EQ 'WRITE' 



JSR 

DIRW 

i 

WRITE DIRECTORY SECTOR 
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. ELSE 

.ERROR 'DIRECTORY ' 

. END IF 
. END IF 

JSR DSKEP.R i DISK ERRORS 

. ENDN 

MACRO FOR DOUBLE LOAD AND DOUBLE STORE INSTRUCTIONS 

. MACRO DLD, REGISTER, DISPLACEMENT 
LD REGISTER, DISPLACEMENT 

LD REGISTER+1, 1+DISPLACEMENT 

. F.NDM 

. MACRO DST, REGISTER, DISPLACEMENT 
ST REGISTER, DISPLACEMENT 

ST REGISTER H, 1+DISPLACEMENT 

. ENDM 

MACROS FOR LOAD AND STORE WITH AUTOINCREMENT ON INDEX 
REGISTERS. 

. MACRO LDA I , REGISTER, INDEX 
LD REGISTER, INDEX 

INC INDEX 

. ENDM 

. MACRO STAI , REGISTER, INDEX 
ST REGISTER, INDEX 

INC INDEX 

. ENDM 

. MACRO INC, INDEX 

. IFC 'INDEX ' EQ ' (AC3) ' 

AISZ AC3, 1 

. ELSE 

. IFC ' INDEX ' EQ ' <AC2) ' 

AISZ AC2, 1 

. ELSE 

.ERROR 'INDEXING' 

. ENDIF 
. END IF 
. ENDM 

MACROS FOR BYTE HANDLING 

. MACRO LLB, REGISTER, ADDRESS 
LD REGISTER, ADDRESS; LOAD LEFT BYTE 

SHR REGISTER, S 

. ENDM 

.MACRO LRB, REGISTER, ADDRESS 







LD 
AND 
. ENDM 


REGISTER, ADDRESS; LOAD RIGHT BYTE 
REGISTER, = X 'OOFF 



MACRO FOR SKIP IF EQUAL INSTRUCTION 

. MACRO SKE, REGISTER, DISPLACEMENT 
SKNE REGISTER, DISPLACEMENT 
JMP . +2 

. ENDM 

MACRO FOR SKIP IF GREATER THAN OR EQUAL TO 

. MACRO SKGE, REGISTER, DISPLACEMENT 
SKG REGISTER, DISPLACEMENT 

SKNE REGISTER, DISPLACEMENT 
JMP . +2 

. ENDM 

MACRO FOR COPYING THE TOP OF THE STACK CONTENT INTO 
REGISTER 

.MACRO CSR, REGISTER 
PULL REGISTER 
PUSH REGISTER 
. ENDM 

MACRO FOR DROPPING THRU TO NEXT ROUTINE 

. MACRO DROP, ADDRESS 

. MLOC ADDR 

. SET ADDR, ADDRESS 

. IF ADDR = . 

. ELSE 

.ERROR 'ADDRESSING' 

. END IF 
. ENDM 

MACRO FOR PUTTING ASCII CHARACTERS ONE PER WORD 

.MACRO . ASCI 1, STRING 
. NSTAT 1 

.SET POSITION, 1 
. DO 100 

.MICRO PI, POSITION, li -b-STRING# 

IPC '"PI" 'ME " 

.WORD '"Pl"'/256 
.SET POSITION, POSITIONS 
. ELSE 
. EXIT 
. END IF 
. ENDDO 
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. MSTAT 0 
. ENDM 


i MACRO FOR PUTTING UNPACKED ASCII WITH DECIMAL POINT 


. MACRO 

. PNLASC , STRING 

. MSTAT 

1 

. SET 

POSITION, 1 

. DO 

iOO 

. MICRO 

Cl, POSITION, 1, 3-STRING* 

. SET 

PSNP1, POSITION+1 

. MICRO 

C2, PSMP1, 1, 3-STRING* 

. IFC 

"•Cl"' EG " 

. EXIT 


. ENDIF 


. IFC 

' ,, C2 , ‘ ' EG '. ' 

. WORD 

'"Cl" '/256MT80 

. SET 

POSITION, POSITION+1 

. EL SE 


. WORD 

'"Cl" '/256 

. ENDIF 


. SET 

POSITION, POSITION+1 

. ENDDO 


. MSTAT 

0 

. ENDM 



MACRO FOR GENERATING COMMAND TABLE 

. MACRO COMMAND, COMMAND, STRING 
. MSTAT 1 

. MICRO CMND, 1 , 2, ^COMMAND* 
.MICRO CMND I, I, 1, ^COMMAND* 
.MICRO STRNG, 1, 9, *STRING* 


WORD 

WORD 


'"CMND" ' 
COMMAND 


IFC 
WORD 
WORD 
END IF 


' "STRNG" ' EG 'MOST USED' 

' " CMNDi " '-B 

COMMAND 


MSTAT 0 
ENDM 

LIST G 


GENERAL 


THE FOLLOWING MACRO DEFINES THE FIRMWARE PROGRAM 
STARTING ADDRESSES AND THE ENTRY POINTS FOR THE ROUTINES 
IN THOSE PROGRAMS. (. INCLD ENTRY) 


.LIST ENTRY ! OD 

















ENTPT 

RDLIN 

ENTPT 

GNCHAR 

ENTPT 

GNSP 

ENTPT 

GNVC 

ENTPT 

DECLPT 

ENTPT 

GCOMMA 

ENTPT 

GETHEX 

ENTPT 

GETDEC 

ENTPT 

GETYN 

ENTPT 

GETCMD 

ENTPT 

OUTNAM 

ENTPT 

RESETD 

ENTPT 

DERROR 

ENTPT 

PGFR 

ENTPT 

DISER 

ENTPT 

FILCOM 

ENTPT 

EXEC 1 

ENTPT 

EXEC2 

ENTPT 

EXEC3 

ENTPT 

OVERLAY 

ENTPT 

OPENR 

ENTPT 

OPENW 

ENTPT 

OPENM 

ENTPT 

CLOSE 

ENTPT 

RCSECT 

ENTPT 

WCSECT 

ENTPT 

RRSECT 

ENTPT 

WRSECT 

ENTPT 

RWORD 

ENTPT 

WWORD 

ENTPT 

REWIND 

ENTPT 

DELF 

ENTPT 

DIRF 

ENTPT 

DIRN 

ENTPT 

DIRW 

UTILITY 

DISKIO 

ENTPT 

DISKI 

ENTPT 

DISK2 

UTILITY 

EXEC 

ENTPT 

PWRON 

ENTPT 

EXECA 

ENTPT 

SYSERR 

ENTPT 

STKOVR 

ENTPT 

BRKPT 

ENTPT 

MP ASS 

ENTPT 

DP ASS 

. NSTAT 

0 


nn 


READ ONE INPUT LINE 

GET NEXT CHAR 

GET NON-SPACE CHAR 

GET NEXT CHAR 

DECREMENT LIME PTR 

TEST FOR COMMA 

GET HEX NUMBER 

GET DECIMAL NUMBER 

GET YES OR NO RESPONSE 

GET COMMAND 

PRINT FILE NAME 

RESET DISK DRIVE PTR 5 

REPORT DISK ERRORS 

PARSE FILE NAME 

DIRECTORY SEARCH 

COMPARE FILE NAMES 

GET AND EXECUTE DISK FILE 

EXECUTE DISK FILE; AC3=IMPTR 

EXECUTE DISK FILE, AC2=FST 

PROGRAM OVERLAY 

OPEN FILE FOR READ 

OPEN FILE FOR WRITE 

OPEN FILE FOR MODIFY 

CLOSE FILE 

READ CONSECUTIVE SECTOR 
WRITE CONSECUTIVE SECTOR 
READ RELATIVE SECTOR 
WRITE RELATIVE SECTOR 
READ WORD FROM FILE 
WRITE WORD TO FILE 
REWIND FILE 
DELETE FILE 

READ FIRST DIRECTORY SECTOR 
READ NEXT DIRECTORY SECTOR 
WRITE CURRENT DIRECT SECTOR 


; DISK I/O, PLIST ADR AT CALL 
; DISK I/O, PLIST ADR IN AC2 


POWER ON INIT 
NORMAL EXEC ENTRY 
ERROR ENTRY POINT 
STACK OVFL PROCESSING 
BRKPT ENTRY 

CHECK FOR MEMORY PASSWORD 
CHECK FOR DISK PASSWORD 
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. ENDM 

.LIST XLIST 
. PAGE 

3. OPERATING ENVIRONMENT: 

STANDARD COPS PDS SYSTEM WHICH CONSISTS OF: 

A) 16K WORDS OF RAM 

B> 6K WORDS OF ROM (440305549) 

C) SINGLE DRIVE FLOPPY DISK (PACE COMPATIBLE) 

D) STANDARD RS-232 OR CURRENT LOOP TERMINAL 

E) IMP-16/200 (980304736-007) 

F) RS-232 PRINTER (OPTIONAL) 

G) IK BUFFER FOR ALL SYSTEM STORAGE 


THE FOLLOWING INCLUDE FILE DEFINES THE HARDWARE 
AND THE SHARED MEMORY ADDRESSES FOR THE PDS SYSTEM. 

(. 1NCLD HWADDR) 


.PAGE 'HARDWARE ADDRESSES' 

HARDWARE BASE ADDRESS FOR THE FRONT PANEL, SERI ALIO AND 
PROM PROGRAMMER: 


PNL J O 


RDSWi 

RRSTA1 


X '0380 


PNLIO 

PNLIG 


BASE ADDRESS OF PNL HW 


ADR OF FRONT PANEL SWITCHES 
ADR OF KYBD UART STATUS 


OFFSETS FROM THE BASE ADDRESS FOR ALL PNL RELATED HARDWARE: 


PNLOFF 

— 

0 



HARDWARE OFFSET 

ft DP it 

= 

PNLOFF 

+ 

000 

ADR FOR READING PROM 

LDD 

= 

PNLOFF 

+ 

000 

LOAD DATA TO BE PROGRAMMED 

L DA 

= 

PNLOFF 

+ 

008 

LOAD ADR TO BE PROGRAMMED 

KYRRD 

= 

PNLOFF 

+ 

008 

READ KEYBOARD 

itDSW 

— 

PNLOFF 

+ 

010 

READ FRONT PANEL SWITCHES 

DWRTO 

=r 

PNLOFF 

4- 

010 

WRT PULSE TO DIGIT 0 

DWRl 4 

=s 

PNLOFF 

+ 

014 

WRT PULSE TO DIGIT 4 

DWRT7 

= 

PNLOFF 

+ 

017 

WRT PULSE TO LEFT DGT (7) 

it DC 

= 

PNLOFF 

+ 

018 

READ MODE FOR PROMS 

CSC 

= 

PNLOFF 

+ 

019 

PROM CHIP SELECT CONTROL 

vss 

= 

PNLOFF 

-t* 

0 1 A 

VSS, VDD, VBB CONTROL 

VPC 


PNLOFF 

+ 

01B 

EPROM PGM PULSE CONTROL 

Git DC 

= 

PNLOFF 

+ 

01C 

GROUND CONTROL FOR PROMS 

HP PC 

= 

PNLOFF 

+ 

01D 

BP PROM PROG DATA ENABLE 

HVC 

= 

PNLOFF 

4- 

01 E 

BP PROG VOLTAGE CONTROL 

Wit DM 

= 

PNLOFF 

+ 

OIF 

WRT CONTROL FOR DSPLY MEM 

itDSTA 

= 

PNLOFF 

+ 

020 

READ KYBD AND UART STATUS 
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TYBAUD 

= 

PNLOFF 

+ 

020 

TTY BAUD RATE DETECT CNTRL 

UDSTB 

= 

PNLOFF 

+ 

040 

READ KYBD AND UART STATUS 

U5BAUD 

= 

PNLOFF 

+ 

040 

232 BAUD RATE DETECT CNTRL 

UAK1 WD 

= 

PNLOFF 

+ 

073 

WRITE UART DATA 

UARTRD 

= 

PNLOFF 

+ 

078 

READ UART DATA 

UAUTRC 

= 

PNLOFF 

j. 

079 

READ UART STATUS REGISTER 

UARTWC 

= 

PNLOFF 

+ 

079 

WRT UART MODE/CNTRL WORDS 

BAUDET 

= 

PNLOFF 

- 

080 

BAUD RATE DETECTOR 

UKESET 

= 

PNLOFF 

- 

080 

UART/BAUD RATE GEN RESET 

T l YEN 

5= 

PNLOFF 

- 

07F 

TTY ENABLE 

CR1EN 

= 

PNLOFF 

- 

07E 

CRT ENABLE 

PKTTTY 

= 

PNLOFF 

- 

07D 

PRINTER ENABLE (TTY) 

RIO 232 

= 

PNLOFF 

- 

07C 

PRINTER ENABLE (232) 

KB BN 

= 

PNLOFF 

- 

07B 

KEYBOARD ENABLE 

WBDGEN 

= 

PNLOFF 

- 

060 

SET UP BAUD RATE GENERATOR 

PNI..RST 

= 

PNLOFF 

- 

040 

RESET ALL IFACE CONTROLS 

RDKLY 

= 

PNLOFF 

- 

020 

READER RELAY CLOCK 


HARDWARE BASE ADDRESS FOR THE TARGET CARD 


I AT 3 0 


X 'DOOO 


OJ-FSFTS FROM THE BASE ADDRESS 
HARDWARE. 


TGTOFF 

TCTAC 

0CN1 R 

HPP'LG 

FLAGS 

PPDEX 


TGTOFF + 000 
TGTOFF + 001 
TGTOFF + 002 
TGTOFF + 003 
TGTOFF + 004 


; SHARED MEMORY DEFINITIONS 


SHRMEM 

SMSIZ 


X 'AOOO 
X '1000 


FOR ALL TARGET CARD RELATED 


HARDWARE OFFSET 
TRACE/TRACE AFTER COUNTER 
OCCURENCE COUNTER 
BRKPT FLAGS 
CONTROL FLAGS 
BRKPT DUMP EXIT 


; SHARED MEMORY BASE ADDRESS 
i SHARED MEMORY SIZE 


THE FOLLOWING INCLUDE FILE DEFINES THE RESERVED 
MEMORY LOCATIONS USED BY THE PDS SOFTWARE AND FIRMWARE. 
(. 1NCLD SY5RAM ) 


. PAGE 


'SYSTEM BUFFER AND BASE PAGE DEFINITIONS' 


THIS IS A COMPLETE DEFINITION OF RESERVED MEMORY 
LOCATIONS IN THE COP DEVELOPMENT SYSTEM. 'SYSBUF 
VARIABLES' ARE MEMORY LOCATIONS IN THE SYSTEM BUFFER REGION 
AT ADDRESSES X'DCOO TO X 'DFFF> WHICH ARE RESERVED FOR USE 
BY FIRMWARE PROGRAMS. 'BASE PAGE VARIABLES' ARE MEMORY 
LOCATIONS IN THE IMP BASE PAGE AT ADDRESSES X'O TO X 'F, 
WHICH ARE PERMANENTLY RESERVED FOR USE BY ONE OR MORE 
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i PROGRAMS. 

« 



i HASE PAGE VARIABLES AT ADDRESSES O TO X'F: 

t 

Zt'RJMP 

= 

0 

SYSTEM ERROR IF PC HERE, 




INDIRECT JUMP THROUGH X'2 

RJLSTK 


1 

STACK FULL INTERRUPT, 




INDIRECT JUMP THROUGH X'3 

SYSER 

= 

2 

ADDRESS OF ROUTINE 'SYSERR ' 

fit iu iv 


3 

ADDRESS OF ROUTINE 'STKOVR' 

C1IJPN 

= 

4 

CHIP NUMBER FOR 'COPMON' 

TCI ACB 

= 

5 

TRACE CONTROL FOR 'COPMON' 

tICNTRB 

= 

6 

OCCURENCE COUNT FOR 'COPMON' 

MPFLGB 

= 

7 

BRKPT CONTROL FOR 'COPMON' 

if AGSB 

s 

a 

FLAG BUFFER FOR 'COPMON' 

KHlUiXB 

= 

9 

DUMP CONTROL FOR 'COPMON' 

ftRCPTR 

= 

OA 

USED BY MEMORY DIAGNOSTICS 

DKTPTR 

SS 

OB 

USED BY MEMORY DIAGNOSTICS 

INDHLK 

= 

OC 

USED EY MEMORY DIAGNOSTICS 

UASi-NU 

= 

OD 

NOT USED 

ItUKPTR 

S 

OE 

ADDRESS OF EXEC 'BRKPT' 

NAXRAM 

i 

ss 

OF 

BASE PAGE PTR TO SYSBUF 

i 

. SET 

OFFSET, X 'SO 

SYSBUF OFFSET 

! 

i MACRO 

FOR ASSIGNING SYSTEM BUFFER SPACE 


. MACRO 

RESERV, NAME, NUMWDS 


. IFC 

'NUMWDS ' NE " 



. SET 

OFFSET, OFFSET-NUMWDS+1 


. END IF 




. SET 

OFFSET, OFFSET- 1 


NAME 

= 

OFFSET 



. ENDM 



; SYSBUF DEFINITIONS: 


» 

TOPSYS 

zs 

ODFFF 

i TOP OF SYSBUF 


~ 

0400 

i SYSBUF SIZE 

SYSBUF 

= 

TOPSYS— OFFSET +• 1 

; SYSBUF ADR LOCATED AT MAXRAM 

i SYSBUF VARIABLES: 

• 

t 

RESERV 

TAB3 

; TAB COLUMN 3 ( FIOSYS, ED IT ) 


RE3ERV 

TAB2 

i TAB COLUMN 2 ( F I OSYS, ED I T ) 


RESERV 

TAB 1 

i TAB COLUMN 1 ( F I OSYS, ED IT ) 


RESERV 

TRKDIR 

; TRACK DIRECTION (DISKIO) 


RESERV 

ERRCNT 

; ERROR COUNT (DISKIO) 


RESERV 

VECTOR 

; PAR AM VECTOR ADR (DISKIO) 


RESERV 

TRKCNT 

; TRK CTR (DISKIO) 
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RESERV DSTAT 
RESERV STACK, 16 
RESERV FLGS 
RESERV DR3 
RESERV DR2 
RESERV DR 1 
RESERV DRO 
RESERV ET1 
RESERV ET2 


; DISK STATUS ADR (DISKIO ) 
i STACK < EX, DISK XO ) 

; STATUS FLAGS ( EX , D I SK 10 ) 
i AC3 < EX, DISKIO) 
i AC2 ( EX, DISKIO) 
i AC 1 (EX, DISKIO) 
i AC 0 ( E X , DISKIO) 
i TEMPORARY ( EX ) 

; TEMPORARY ( EX ) 


RESERV MEMRNG 
RESERV BDATA2 
RESERV BLQC2 
RESERV BDATA1 
RESERV BLOC 1 
RESERV BRKNUM 
RESERV CURD 
RESERV DATA 
RESERV RNGE 
RESERV MODE 
RESERV ADDR 
RESERV ACCESS 
RESERV HIGH 
RESERV LOW 
RESERV ASHI 
RESERV ASLO 
RESERV TSHI 
RESERV TSLO 
RESERV PTRHI 
RESERV PTRLO 
RESERV BSHI 
RESERV BSLQ 
RESERV ENTPT 
RESERV CHCNT 
RESERV DIR 
RESERV DIREND 
RESERV DIRP 
RESERV DIR 1 
RESERV DIR2 
RESERV DIRS 
RESERV DIRSECT 
RESERV FREE1 
RESERV FREE2 
RESERV NST1CT 
RESERV NST2CT 
RESERV CURVOL 
RESERV FSADR 


i NON-SYSBUF TOPRAM ADR (EX) 

; DATA OF 2ND BREAK (EX) 
i ADR OF 2ND BRK ( EX ) 

; DATA OF 1ST BRK (EX ) 
i ADR OF 1ST BRK ( EX ) 
i CTR FOR # OF 3RKS SET (EX) 
i L.AST ALTERED MEMORY ADR (EX) 

{ DATA REG (EX ) 
i END OF RANGE INDEX (EX) 

; MODE (EX) 
i ADDR (EX ) 

{SECURITY ACCESS CODE(FIOSYS) 
i TEMP RANGE FOR MP LOADING 
i (FIOSYS) 

{ ABSOLUTE SECTOR RANGE OF 
i MP'S VECTOR (FIOSYS) 

;TOP SECT RNGE OF MP'S VECTOR 
i (FIOSYS) 

J PTR RNG OF MP'S VECTOR 
; (FIOSYS) 

;BASE SECT RNG OF MP'S VECTOR 
/ (FIOSYS) 

{ENTPT OF MP'S VECTOR ( FIOSYS ) 
{ACTIVE CHANNEL COUNT ( FI 0SY3 ) 
{DIRECTORY BUF PTR (FIOSYS) 
{END OF DIRECTORY BUF(FIOSYS) 
{TEMP PTR TO DIR(FIOSYS) 

{DIR SECTOR FOR NST1 (FIOSYS) 
DIR SECTOR FOR NST2( FIOSYS) 
{DIRECTORY SECTOR ( F IOSYS ) 
{CURRENT DIR SECTOR tf (FIOSYS) 
{FREE SPACE PTR, NST1 (FIOSYS) 
{FREE SPACE PTR, NST2(FI0SYS) 
{ CHNL TBL CNT , NST1 (FIOSYS) 

; CHNL TBL CNT, NST2(FI0SYS) 
{CURRENT VOL NST ADR (FIOSYS) 

{ FST ADDRESS ( F I OSYS ) 


RESERV CTADR 
RESERV FR3 
RESERV FR2 
RESERV FR1 
RESERV FRO 
RESERV FTO 


{CHANNEL TBL ADR(FIOSYS) 
{ AC3(FI0SYS > 

{ AC2 ( FIOSYS ) 

AC 1 (FIOSYS) 

ACO( FIOSYS) 

TEMPORARY ( FIOSYS ) 
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RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
RESERV 
. IF 


FT 1 
FT2 
FT3 
FT 4 
FT 5 
FT6 
FT7 
FT8 
FT9 

CNBAUD 

PRBAUD 

CNCRDL 

PRCRDL 

CNLFDL 

PRLFDL 

PRFFDL 

PRVTDL 

CNMODE 

PRMODE 

CNTYPE 

PRTYPE 

CONPRT 

FST » FSSIZE 

ANY, 16 

ANYTMP 

OFFSET = 0 


i TEMPORARY < FIOSYS ) 
i TEMPORARY (FIOSYS > 

; TEMPORARY (FIOSYS) 
i TEMPORARY ( FIOSYS) 
i TEMPOR ARY ( FIOSYS ) 
i TEMPORARY (FIOSYS ) 

; TEMPORARY (FIOSYS ) 
i TEMPORARY ( FIOSYS ) 
i TEMPORARY (FIOSYS) 
j CON BAUD RATE(CONIO, FIOSYS) 
i PRTR BAUD RATE(CONIO, FIOSYS) 
i CON CR DELAYCCONIO, FIOSYS) 
i PRTR CR DELAY(CONIO, FIOSYS) 
i CON LF DELAY(CONIO, FIOSYS) 
i PRTR LF DELAY(COMIO, FIOSYS) 
j PRTR FF DELAY(CONIO, FIOSYS) 

; PRTR VT DELAY ( CONIO, FIOSYS ) 
i CONSOLE MODE (CONIO) 
i PRINTER MODE ( CONIO ) 
i CONSOLE TYPE (CON I 0 ) 

; PRINTER TYPE (CON 10) 
iSERIALI/O SET UP 0=C0N/3=PRT 
i FILE STATUS TBL(FIOSYS) 
i TEMP FOR ANYBODY 
i TEMP FOR ANYBODY ©MAXRAM 


AMOVE VARIABLES USE UP ALL 128 TOPSYS +RELATI VE WORDS 


MWP 1 
CMNSIZ 


. ELSE 

.ERROR 'SYSBUF ' 

. ENDIF 

RESERV NU1 , 34 j UNUSED TOPSYS -RELATIVE WRDS 

RESERV LINPTR ; INPUT LINE BUF PTR(FIOSYS) 

RESERV CWIDTH i CARR I AGE WIDTH < FIOSYS ) 

RESERV PLIST, PLSIZE i DISKIO PARAM LIST(FIOSYS) 
RESERV FIOSTK, 16 i STACK SAVE ( FIOSYS ) 

RESERV TRPLST, 51 ; PLIST FOR MEMDI 

RESERV TRDLST , 4 ; DLIST FOR FP0UT4 

RESERV DIRBUF, SECTSZ ; D IRECTORY BUF ( FIOSYS ) 

= MXWDTH+1 

RESERV LINBUF, MWP 1 ; INPUT LINE BUF(FIOSYS) 

* CTSI ZEk-MAXCHN ; CHANNEL TBL BUFFER SIZE 

RESERV CHANNEL, CHNSIZ ; CHANNEL TABLES ( FIOSYS ) 

RESERV NSTBF1, NSTSIZ ; NST1 (FIOSYS ) 

RESERV NSTBF2, NSTSIZ ; NST2 ( FIOSYS ) 

. IF OFFSET+SSI Z-12S = 0 


AMOVE VARIABLES USE UP ALL WORDS IN SYSBUF 






. END IF 


4. DETAILED COMPONENT DESIGN: 


NOT APPLICABLE 


5. SYSTEM GENERATION ENVIRONMENT: 

IMP MACRO ASSEMBLER RUNNING 
ON 28K PACE. (MODIFIED PIMPAS) 


SIZE12 = 


1-SIZE8 


COPS CHANGES 


FIRE 




63 

. ENDIF 



64 

. ENDIF 



65 

. IF 

IMP 16 


66 

. TITLE 

PIMPAS, ' P05493A 

08/16/78 COPS ' 

67 

. ENDIF 



63 

. ELSE 



*•#***■*•**»■******•*********•*****•#**■**■**********•**■*■***■*»■**■*** 

J 402 

LD 

RO, =$MBUF i 

TEMP BUFF POINTER 

1403 

ST 

RO, $MPNTR 


J 404 




J 405 ; 

COPS 

CHANGE 


1406 i 




1407 *1: 




J 408 ; 




1409 

JSR 

NXCHAR i 

GET A CHARACTER 

1410 

SKNE 

RO, MMARK i 

CHECK FOR MICRO-MARK 

fc*JHfr*****************************#*******************"**** 

1425 

SKNE 

RO, MMARK 


1426 

JMP 

*5 i 

PROCESS MICRO 

1 4 27 ; 




1 428 ; 

COPS 

CHANGE 


1489 ; 




1430 

DSZ 

INPTR 


1431 $3: 

ISZ 

ITEMLN 

. 

1438 

LD 

RO, ITEMLN 


1 433 

BOC 

ZRO, *1 


1434 $4: 

DSZ 

INPTR 


1435 

A ISZ 

RO, -1 


i 436 

JMP 

$4 


1437 

JMP 

*1 








; SEARCH FOR DEFINED MICRO 


1 430 i 



1437 i 



14 AO } 



1441 $ 5: 

LI 

RO, 0 

1^142 

JSR 

MCSRCH 

J 443 

JMP 

$8 


j /}/}'•{ JMP $8 i NOT FOUND — ERROR 

<• i> & ti ■* #*•«••«•# *•»•»■*#*** ■it-*#***## # * ** * *■&# •* *#* # 


H>76 $3: 

JSR 

NXCHAR 

; PROCESS STRING 

J 077 

SKNE 

RO, *DELIM 


J 570 i 

1 077 ; 

COPS 

CHANGE 


J 500 ; 

J 501 

JMP 

$6 

i TERMINATING DEL 

J 582 ; 

1 583 

LD 

RO, CHARTP 

i TEST FOR EOL 

J 584 

SKNE 

RO, =NCEOL 



j:- «• ##*#*#****#*#***#****##** ■#•■* ■«•■«■■*■»•■»■»■# * * «• # 

J7/J3 LI RO, DFPRM i PARAMETER FLAG 


1743 

LI 

RO, DFPRM 

i 

J 744 

JMP 

*4 


J 74 5 ; 

1 746 i 

COPS 

CHANGES 


1747 ; 

1748 $LOC: 
1747 

JSR 

$CKLVL 

i 

1750 

JMP 

*STORE 

i 

1751 i 

1758 

SFLG 

CRYFLG 

i 

1753 

SUBB 

RO, TPL IM 



IGNORE LOCAL 
LEVEL IS NOT 


IF MACRO NEST 

1 


ADJUST LOCAL NUMBER TO 3*NUM 


1776 $LOCS: .=.+1 i LIMIT OF LOCAL SYMBOL STACK 

1777 $PLIM: =. +1 ; LIMIT OF PARAMETER STACK 


1776 $LQCS: 

. =. +1 


1777 $PLIM: 

1778 i 

. =. +1 


1 777 i 

1 800 ; 

1801 *CKLVL: 

COPS CHANGES 

1 808 

PUSH 

RO 

1 803 

LD 

RO, *MCNT 

1804 

SKNE 

RO, =1 

1 805 

JMP 

$LEV1 

1806 

PULL 

RO 

1807 

1800 $LEV1: 

RTS 


1807 

PULL 

RO 

1810 

1811 

RTS 

1 

1818 

1813 i 

. POOL 

16 

1814 i CHECK 

1815 i 

FOR MACRO DIRECT 


K- C- K- -SI-*# ## * #* -SHJ- # # 


1810 
HU 7 


R3, $DT AB 
TBSRCH 


R3 POINTS AT MACRO DIRECTIVE Ti 
SEARCH TABLE 



National Semiconductor Corporation 
2900 Semiconductor Drive 
Santa Clara, California 95051 



SCALE 


H- 4-03 0 5 S 3 4* 


SHEET 3Z OF 36 






1 820 

i 





1021 

i 

COPS 

CHANGE 



1 822 

; 





J 088 

$32: 

JMP 

$STORE 

j 

NOT FOUND, SIMPLY PUT IN DEFINI 

— ' 1824 


SKNE 

R3, =$MLOC 

i 

. MLOC DIRECTIVE 

1 888 


JMP 

$8 



1086 


SKNE 

R3, =$ENDM 

i 

. ENDM DIRECTIVE 

1027 


JMP 

$7 



1 880 


SKNE 

R3» =$NACRO 

i 

.MACRO DIRECITVE 

1827 


JMP 

$7 



1 820 


SKNE 

R3, =$END 

i 

.END DIRECTIVE 

1021 


JMP 

$32 



1828 

i 





1020 

# 





1024 


HALT 


9 

SYSTEM ERROR 

r, K- * •**■*■«■■«•*■*•«•#■•* * * ■**■*•»"»•*■&■**■** •«• *##******#**#*#■*-*-«■-* -**■**-«■■«•■«■■»•'«■ * 

1 844 

; . MLOC 

PROCESSING 



1848 






J 846 






1847 


COPS 

CHANGES 



1848 






1 047 

$5: 





1 880 


JSR 

$CKLVL 

9 

IGNORE MLOC IF MACRO NEST 

J08J 


JMP 

$STORE 

9 

LEVEL IS NOT 1 

1888 

1 





It <82 


JSR 

$CHKV 

9 

CHECK WHETHER TO RECOGNIZE DIRE; 

1 084 


LI 

RO, DFSKIP 

$ 

PUT SKIP FLAG IN DEF SO THIS LI i 


1 786 


JMP 

$STQRE 

9 

NO SPECIAL SIGNIFICANCE IN ITEM 

1787 




9 

SIMPLY SAVE IN DEFINITION 

1 720 

9 





1 787 

i 

COPS 

CHANGES 



1 780 

i 





1721 

$PREF: 





1 722 


JSR 

$CKLVL 

9 

IGNORE PARAM DEF IF MACRO 

1722 


JMP 

$STORE 

9 

NEST LEVEL IS NOT 1 

1924 

; 





1788 


JSR 

NX ITEM 

9 

NEXT ITEM A CONSTANT? 

1726 


LI 

RO, 0 

9 

CLEAR BACKUP FLAGS AND BACK 


1 786 


JMP 

$NXT 



1 787 

$20: 

LI 

RO, DFARG 

9 

SET ARGUMENT REFERENCE FLAG 

i 780 

i 





1787 

/ 

COPS 

CHANGES 



1 760 

# 





1 76 J 


JMP 

. +2 



1 762 

$CONC: 





1 762 


LI 

RO, DFCON 

9 

SET CONCATENATION FLAG. 

1 764 


JSR 

$CKLVL 

9 

IGNORE CONCATENATION IF 

1 768 


JMP 

$STORE 

9 

MACRO NEST LEVEL IS NOT 1 

1 766 

i 








A 

+4-0305 83 *1 

cl 

SCALE j SHEET 33 0F 36 



National Semiconductor Corporation 
2900 Semiconductor Drive 
Santa Clara, California 95051 


425300007-001 C 




J 




0000 $LOOP : 

JSR 

GETNM1 

i GET MACRO NAME 

0001 

008? ; 

JMP 

XERROR 

' i NO NAME, SYNTAX ERROR 

8083 ; 

3004 ; 

COPS 

CHANGE 


3080 

3086 ; 

3037 i 

LD 

RO, XEOOO 

• 

8080 

JSR 

MCSRCH 

i SEARCH FOR DEFINED MACRO 

3087 

JMP 

*UND 

; MACRO UNDEFINED 

»*&**************************■***•*■*******•*■********•*****■*** 

8 j 07 ' « BEEN DELETED SINCE LAST COMP 

31 1.0 

3111 i 

BOC 

ZRO, *RTS 

; NO 

3112 ; 

3113 ; 

COPS 

CHANGES 


81 1 4 

LD 

RO, MACPTR 

; SEE IF MACRO BEING EXPANDED 

81 15 

BOC 

NZR, $RTS 

j IF SO, DON'T COMPRESS NOW 

81 16 

LI 

RO, 0 

; CLEAR COMPRESS FLAG 

8> 1 7 

81 18 ; 

81 17 i 

ST 

RO, CMPFLG 


8120 

LD 

R3, BASE 

; R3 POINTS AT NEXT MACRO DEF 

8121 $2: 

SKNE 

R3, NXTMAC 

; AT END OF STACK? 


«•*£*******#***#************■»■*■*»***••«•***-#■■*•*■«•**■«•*■»•-»•■»■***■*•**** 


8638 

PRMSTK: 

. = . +299 

i PARAMETER STACK BUILDS UP 

8687 

8670 

CALSTK: 

j 

. =. +1 

i MACRO CALL STACK BUILDS DOWN 

8691 

i 

COPS CHANGE 


8692 

i 



8693 

8694 

8695 

PTRTAB: 

PTREND: 

. =. +2300 

. END START 



j:-*:-*#**********-**-*-*-* -a- *******#■■»•■»■»■**■»■***■ # *** * ****■******•#••«■•**■ * 


A. MANUFACTURING REPRODUCTION 

LOAD DSKIT INTO THE PDS SYSTEM. 

INSERT DISK TO BE INITIALIZED. 

DSKIT WILL PROMPT FOR A COMMAND 
ENTER THE FOLLOWING: 

D> IN "PDS", "PDS MASTER DISK" 

WHEN THE DISK IS INITIALIZED IT MAY 
BE DUPLICATED ON A PACE MACHINE IN THE 
NORMAL MANNER OR IT MAY BE DUPLICATED 
ON PDS. 

TO DUPLICATE ON PDS : 



National Semiconductor Corporation 
' 2900 Semiconductor Drive 

A 

W305834- 

B 


Santa Clara, California 95051 

SCALE 

SHEET 3H OF 36 


423300007-001 C 





1 


LOAD FM 

FM WILL PROMPT FOR A COMMAND 
ENTER THE FOLLOWING: 

F> DU CDS TO PDS 

FOLLOW THE INSTRUCTIONS ON THE 

CONSOLE. 


8 . 


LIST OF RELATED DOCUMENTS: 

430305767-000 

COPMON 

430305768-000 

EDIT 

4 3 0 3 0 5 769- 0 0 0 

DSKIT 

4303057 7 0-000 

FM 

430305807-000 

ASM 

43030577 1 -000 

LIST 

4 30305772-000 

XREF 

430305938-000 

MASKTR 

430305937-000 

MDIAG 

420305548-00 1 

COP SYSTEM IJ: 

091305548-000 

CUSTOMER SUP 

CHANGES: 

CHANGES FROM REV "A" 

TO B 

MODIFIED COPMON, EDIT 

, FM, ASM AND 

ADDED LIST, XREF , MAS 

KTR AND MDIAG. 

CHANGES FROM REV "E" 

TO "C" 


MODIFIED COF'MON AND MASKTR 

SEE APPROPRIATE 43030XXXX-000 PACKAGE FOR DETAILS. 
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CONTENTS OF MASTER DISKETTE 


COPMON 

EDIT 

DSKIT 

FM 

ASM 

LIST 

XREF 

MASKTR 

MDIAG 


430305767 
430305768 
43030576? 
430305770 
430305807 
43030577 1 
430305772 
430305938 
430305937 


REV. C 
REV. B 
REV. B 
REV. B 
REV. B 
REV. A 
REV. A 
REV. B 
REV. A 


LABEL DISKETTE USING A BLANK INDEX LABEL MARKED WITH: 

" PDS MASTER 440305834-200C" 

NOTE: THE 440305834-200 IS CREATED FROM A BLANK, 

UNINITIALIZED, SINGLE DENSITY DISKETTE P/N 205004514-001 
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440305834 




